home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
IRIX Base Documentation 1998 November
/
IRIX 6.5.2 Base Documentation November 1998.img
/
usr
/
share
/
catman
/
p_man
/
cat3
/
f90
/
modulo.z
/
modulo
Wrap
Text File
|
1998-10-30
|
2KB
|
49 lines
MODULO(3I) Last changed: 1-6-98
NNAAMMEE
MMOODDUULLOO - Modulo function
SSYYNNOOPPSSIISS
MMOODDUULLOO (([AA==]_a,, [PP==]_p))
IIMMPPLLEEMMEENNTTAATTIIOONN
UNICOS, UNICOS/mk, and IRIX systems
SSTTAANNDDAARRDDSS
Fortran 90
DDEESSCCRRIIPPTTIIOONN
The MMOODDUULLOO function accepts the following arguments:
_a Must be of type integer or real
_p Must be of the same type and kind type parameter as _a
MMOODDUULLOO is an elemental function. The name of this intrinsic cannot be
passed as an argument.
RREETTUURRNN VVAALLUUEESS
The result type and type parameter are the same as _a, which can be
integer or real.
When _a is of type integer, if PP =//= 00, MMOODDUULLOO (_a, _p) has the value _r
such that AA == QQ xx PP ++ RR, where _q is an integer. The inequality
0 <= _r < _p holds if _p > 0, and _p < _r <= 0 holds if _p < 0.
If PP == 00, the result is machine-specific. The result is not a
meaningful number (a NAN) when that value is available. Otherwise the
result is 0.
When _a is of type real, if PP =//= 00, the value of the result is AA -- FFLLOOOORR
((AA // PP)) ** PP. If PP == 00, the result is machine-specific.
EEXXAAMMPPLLEESS
MMOODDUULLOO((88,, 55)) has the value 3. MMOODDUULLOO((--88,, 55)) has the value 2.
MMOODDUULLOO((88,, --55)) has the value -2. MMOODDUULLOO((--88,, --55)) has the value -3.
SSEEEE AALLSSOO
_I_n_t_r_i_n_s_i_c _P_r_o_c_e_d_u_r_e_s _R_e_f_e_r_e_n_c_e _M_a_n_u_a_l, publication SR-2138, for the
printed version of this man page.